home *** CD-ROM | disk | FTP | other *** search
/ Commodore 64 Scene Diskmags Assortment / Influx_02_1989-07_Influx_Staff.d64 / influx reader (.txt) < prev   
Commodore BASIC  |  2023-02-26  |  10KB  |  11 lines
  1. 1744 sys2051
  2. 61048 0(NULL)dimexp1cmd(NULL)
  3. 1712 exp"[157]3[202][208][237][169]o[133]-[169]<[133].l[173]%[254]o<[227]+ W[144]l W[176][169][208]. 4[201][240]I[208]" 4right$(NULL)I(NULL)(NULL) 4right$(NULL)I(NULL)new 4totheninput#stepinputnotfn(NULL)input(NULL)fn(NULL)input(NULL) {$7c}fn(NULL)input(NULL)fn(NULL)input(NULL) Wor9 Wornew 4new 4I@stop(NULL)thencloseinput#notinputspc(fn(NULL)Espc(input(NULL)fn(NULL)Etheninput(NULL)fn(NULL)(NULL)asc(NULL)asc(NULL) readl
  4. 887 or6stepinputnot Wornewstep close
  5. 900  4Einputspc(fnthenEinputthenstopexp Worstep
  6. 57296 step closenew(NULL)(NULL) Wor Wstep
  7. 48848  Wor 4I(NULL)>new 4(NULL)+step
  8. 64262 (NULL)*&thenmid$(NULL)(NULL)new{$60}close<,close{$7b}restoreDhclose
  9. 65188 (NULL)asc(NULL)asc(NULL)tan(NULL)(NULL)8*input(NULL)Hl<to(NULL)tan(NULL)(NULL)step7input(NULL)0(NULL)xl(NULL)(NULL)(NULL){$60}8fn(NULL)(NULL)notinput(NULL)orasc(NULL)tonot(NULL)fn(NULL)8(NULL)notinput(NULL)orasc(NULL)>(NULL)leton(NULL)print#(NULL)(NULL)str$step(NULL){$60}>(NULL)asc(NULL)asc(NULL)ascstep(NULL)exp<cmd(NULL)(NULL)(NULL)(NULL)(NULL)and(NULL)=asc(NULL)(NULL)(NULL)dimstepmid$contnewl
  10. 6144 stopnextsys 2072 mdgpacker
  11.